home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Software Vault: The Gold Collection
/
Software Vault - The Gold Collection (American Databankers) (1993).ISO
/
cdr25
/
rxcalc.zip
/
WHOLE.CAL
< prev
Wrap
Text File
|
1993-03-01
|
228b
|
5 lines
/* Validate a Rexx whole number */
parse arg number /* get the number */
call lineout 'd:\rexxcalc\calc.log', number
return datatype(number, 'Whole') /* return the validation */